home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / dev / gg / ncurses-5.3.lha / ncurses-5.3 / form / fty_alnum.c < prev    next >
C/C++ Source or Header  |  2002-10-24  |  5KB  |  139 lines
  1.  
  2. /*
  3.  * THIS CODE IS SPECIFICALLY EXEMPTED FROM THE NCURSES PACKAGE COPYRIGHT.
  4.  * You may freely copy it for use as a template for your own field types.
  5.  * If you develop a field type that might be of general use, please send
  6.  * it back to the ncurses maintainers for inclusion in the next version.
  7.  */
  8. /***************************************************************************
  9. *                                                                          *
  10. *  Author : Juergen Pfeifer                                                *
  11. *  Contact: http://www.familiepfeifer.de/Contact.aspx?Lang=en              *
  12. *                                                                          *
  13. ***************************************************************************/
  14.  
  15. #include "form.priv.h"
  16.  
  17. MODULE_ID("$Id: fty_alnum.c,v 1.11 2002/07/06 15:33:27 juergen Exp $")
  18.  
  19. typedef struct {
  20.   int width;
  21. } alnumARG;
  22.  
  23. /*---------------------------------------------------------------------------
  24. |   Facility      :  libnform  
  25. |   Function      :  static void *Make_AlphaNumeric_Type(va_list *ap)
  26. |   
  27. |   Description   :  Allocate structure for alphanumeric type argument.
  28. |
  29. |   Return Values :  Pointer to argument structure or NULL on error
  30. +--------------------------------------------------------------------------*/
  31. static void *Make_AlphaNumeric_Type(va_list * ap)
  32. {
  33.   alnumARG *argp = (alnumARG *)malloc(sizeof(alnumARG));
  34.  
  35.   if (argp)
  36.     argp->width = va_arg(*ap,int);
  37.  
  38.   return ((void *)argp);
  39. }
  40.  
  41. /*---------------------------------------------------------------------------
  42. |   Facility      :  libnform  
  43. |   Function      :  static void *Copy_AlphaNumericType(const void *argp)
  44. |   
  45. |   Description   :  Copy structure for alphanumeric type argument.  
  46. |
  47. |   Return Values :  Pointer to argument structure or NULL on error.
  48. +--------------------------------------------------------------------------*/
  49. static void *Copy_AlphaNumeric_Type(const void *argp)
  50. {
  51.   const alnumARG *ap = (const alnumARG *)argp;
  52.   alnumARG *result = (alnumARG *)malloc(sizeof(alnumARG));
  53.  
  54.   if (result)
  55.     *result = *ap;
  56.  
  57.   return ((void *)result);
  58. }
  59.  
  60. /*---------------------------------------------------------------------------
  61. |   Facility      :  libnform  
  62. |   Function      :  static void Free_AlphaNumeric_Type(void *argp)
  63. |   
  64. |   Description   :  Free structure for alphanumeric type argument.
  65. |
  66. |   Return Values :  -
  67. +--------------------------------------------------------------------------*/
  68. static void Free_AlphaNumeric_Type(void * argp)
  69. {
  70.   if (argp) 
  71.     free(argp);
  72. }
  73.  
  74. /*---------------------------------------------------------------------------
  75. |   Facility      :  libnform  
  76. |   Function      :  static bool Check_AlphaNumeric_Field(
  77. |                                      FIELD *field,
  78. |                                      const void *argp)
  79. |   
  80. |   Description   :  Validate buffer content to be a valid alphanumeric value
  81. |
  82. |   Return Values :  TRUE  - field is valid
  83. |                    FALSE - field is invalid
  84. +--------------------------------------------------------------------------*/
  85. static bool Check_AlphaNumeric_Field(FIELD * field, const void * argp)
  86. {
  87.   int width = ((const alnumARG *)argp)->width;
  88.   unsigned char *bp  = (unsigned char *)field_buffer(field,0);
  89.   int  l = -1;
  90.   unsigned char *s;
  91.  
  92.   while(*bp && *bp==' ') 
  93.     bp++;
  94.   if (*bp)
  95.     {
  96.       s = bp;
  97.       while(*bp && isalnum(*bp)) 
  98.     bp++;
  99.       l = (int)(bp-s);
  100.       while(*bp && *bp==' ') 
  101.     bp++;
  102.     }
  103.   return ((*bp || (l < width)) ? FALSE : TRUE);
  104. }
  105.  
  106. /*---------------------------------------------------------------------------
  107. |   Facility      :  libnform  
  108. |   Function      :  static bool Check_AlphaNumeric_Character(
  109. |                                      int c, 
  110. |                                      const void *argp )
  111. |   
  112. |   Description   :  Check a character for the alphanumeric type.
  113. |
  114. |   Return Values :  TRUE  - character is valid
  115. |                    FALSE - character is invalid
  116. +--------------------------------------------------------------------------*/
  117. static bool Check_AlphaNumeric_Character(int c, const void * argp GCC_UNUSED)
  118. {
  119.   return (isalnum(c) ? TRUE : FALSE);
  120. }
  121.  
  122. static FIELDTYPE typeALNUM = {
  123.   _HAS_ARGS | _RESIDENT,
  124.   1,                           /* this is mutable, so we can't be const */
  125.   (FIELDTYPE *)0,
  126.   (FIELDTYPE *)0,
  127.   Make_AlphaNumeric_Type,
  128.   Copy_AlphaNumeric_Type,
  129.   Free_AlphaNumeric_Type,
  130.   Check_AlphaNumeric_Field,
  131.   Check_AlphaNumeric_Character,
  132.   NULL,
  133.   NULL
  134. };
  135.  
  136. NCURSES_EXPORT_VAR(FIELDTYPE*) TYPE_ALNUM = &typeALNUM;
  137.  
  138. /* fty_alnum.c ends here */
  139.